package com.mask.lego.product.service.impl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.TypeReference;
import com.mask.lego.common.constant.CategoryConstant;
import com.mask.lego.product.service.CategoryBrandRelationService;
import com.mask.lego.product.vo.Catelog2Vo;
import lombok.extern.slf4j.Slf4j;
import org.redisson.api.RLock;
import org.redisson.api.RedissonClient;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.cache.annotation.*;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.data.redis.core.StringRedisTemplate;
import org.springframework.data.redis.core.script.DefaultRedisScript;
import org.springframework.stereotype.Service;

import java.util.*;
import java.util.concurrent.TimeUnit;
import java.util.stream.Collectors;

import com.baomidou.mybatisplus.core.conditions.query.QueryWrapper;
import com.baomidou.mybatisplus.core.metadata.IPage;
import com.baomidou.mybatisplus.extension.service.impl.ServiceImpl;
import com.mask.lego.common.utils.PageUtils;
import com.mask.lego.common.utils.Query;

import com.mask.lego.product.dao.CategoryDao;
import com.mask.lego.product.entity.CategoryEntity;
import com.mask.lego.product.service.CategoryService;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.StringUtils;


@Service("categoryService")
@Slf4j
public class CategoryServiceImpl extends ServiceImpl<CategoryDao, CategoryEntity> implements CategoryService {

    @Autowired
    private CategoryBrandRelationService categoryBrandRelationService;

    @Autowired
    private StringRedisTemplate redisTemplate;
    @Autowired
    private RedissonClient redisson;

    @Override
    public PageUtils queryPage(Map<String, Object> params) {
        IPage<CategoryEntity> page = this.page(
                new Query<CategoryEntity>().getPage(params),
                new QueryWrapper<CategoryEntity>()
        );

        return new PageUtils(page);
    }

    @Override
    public List<CategoryEntity> listWithTree() {
        //1.查出所有分类
        List<CategoryEntity> entities = baseMapper.selectList(null);

        //2.组装成父子结构

        //2.1 查找一级分类
        List<CategoryEntity> level1Menus = entities.stream().filter(categoryEntity ->
            categoryEntity.getParentCid() == 0
        ).map((menu) -> {
            //查找出子节点
            menu.setChildren(getChildrens(menu,entities));
            return menu;
        }).sorted((menu1,menu2) -> {
            return menu1.getSort() - menu2.getSort();
        }).collect(Collectors.toList());


        return level1Menus;
    }

    /**
     * 查找子节点
     * @param root 父节点
     * @param all 所有节点
     * @return
     */
    private List<CategoryEntity> getChildrens(CategoryEntity root, List<CategoryEntity> all) {

        List<CategoryEntity> childen = all.stream().filter(categoryEntity -> {
            return categoryEntity.getParentCid().equals(root.getCatId());
        }).map(categoryEntity -> {
            //递归查找子节点
            categoryEntity.setChildren(getChildrens(categoryEntity, all));
            return categoryEntity;
        }).sorted((menu1,menu2) -> {
            return (menu1.getSort()==null?0:menu1.getSort()) - (menu2.getSort()==null?0: menu2.getSort());
        }).collect(Collectors.toList());
        return childen;
    }

    @Override
    public void removeMenuByIds(List<Long> asList) {
        //TODO 检查当前菜单，是否被别处引用
        baseMapper.deleteBatchIds(asList);
    }

    @Override
    public Long[] findCatelogPath(Long catelogId) {
        List<Long> paths = new ArrayList<>();
        List<Long> parentPath = findParentPath(catelogId, paths);
        //地址逆序
        Collections.reverse(parentPath);
        return (Long[]) parentPath.toArray(new Long[parentPath.size()]);
    }


    /**
     * @param category
     * 级联更新所有关联的数据
     * @Cache
     * @CacheEvict 失效模式，清除缓存
     * @Caching 同时进行多种缓存操作
     * @CacheEvict(value = "category",allEntries = true) 指定删除缓存某个分区下的所有数据
     * @CachePut 缓存修改后，将数据在缓存中再放一份，避免双写
     * 该分区Redis没有物理分区，只是在Spring中有逻辑分区标识
     * 总结：存储同一类型的数据，都应该指定同一分区
     * SpringCache的不足：
     *      1.读模式
     *          缓存穿透：查询一个一定不存在的数据      ->解决：缓存空数据 spring.cache.redis.cache-null-values=true
     *          缓存击穿：高并发查询一个正好过期的数据   ->解决：加锁 @Cacheable(sync = true)
     *          缓存雪崩：查询大量的key同时过期         ->解决：加随机时间、加过期时间 spring.cache.redis.time-to-live=3600000
     *      2.写模式(缓存与数据库一致)
     *          读写加锁 Redisson
     *          引入Canal 感知到mysql数据更新去更新数据库
     *          读多写少，直接去数据库查询
     * 总结：常规数据（读多写少，即时性，一致性要求不高）完全可以使用SpringCache
     *      特殊数据：特殊设计
     *
     */
    @Override
    @Transactional
//    @Caching(evict = {
//            @CacheEvict(value = "category", key = "'getLevel1Categorys'"),
//            @CacheEvict(value = "category", key = "'getCatalogJson'")
//    })
    @CacheEvict(value = "category",allEntries = true)
    //@CachePut
    public void updateCascade(CategoryEntity category) {
        this.updateById(category);
        categoryBrandRelationService.updateCategory(category.getCatId(),category.getName());

    }

    //每一个缓存都需要指定名称，缓存分区
    @Cacheable(value = {"category"},key = "#root.method.name",sync = true)   //代表当前方法的结果缓存，如果缓存中有则不调用，缓存中没有则调用方法，最后将方法的结果放入缓存
    @Override
    public List<CategoryEntity> getLevel1Categorys() {
        long start = System.currentTimeMillis();
        List<CategoryEntity> categoryEntities = baseMapper.selectList(
                new QueryWrapper<CategoryEntity>().eq("parent_cid", 0));
        long end = System.currentTimeMillis();
        long time = end-start;
        log.info("查询一级分类列表消耗时间:{}",time);
        return categoryEntities;
    }

    @Override
    @Cacheable(value = "category",key = "#root.method.name")
    public Map<Long, List<Catelog2Vo>> getCatalogJson() {

        log.info("二级分类数据查询中~~~");
        /**
         * 将数据库操作合并为一次
         * 性能优化
         */
        List<CategoryEntity> selectList = baseMapper.selectList(null);

        //1.查出所有一级分类
        List<CategoryEntity> level1Categorys = getParent_cid(selectList, 0L);
        //2.封装数据
        Map<Long, List<Catelog2Vo>> parent_cid = level1Categorys.stream().collect(Collectors.toMap(k -> k.getCatId(), v -> {
            //根据一级分类查出所有二级分类
            List<CategoryEntity> categoryEntities = getParent_cid(selectList, v.getCatId());
            //封装结果
            List<Catelog2Vo> catelog2Vos = null;
            if (categoryEntities != null) {
                catelog2Vos = categoryEntities.stream().map(l2 -> {
                    Catelog2Vo catelog2Vo = new Catelog2Vo(v.getCatId().toString(), null, l2.getCatId().toString(), l2.getName());
                    //找出当前二级分类的VO找出三级分类
                    List<CategoryEntity> level3Catalog = getParent_cid(selectList, l2.getCatId());
                    if (level3Catalog != null) {
                        List<Catelog2Vo.Catelog3Vo> collect = level3Catalog.stream().map(l3 -> {
                            //封装成指定格式
                            Catelog2Vo.Catelog3Vo catelog3Vo = new Catelog2Vo.Catelog3Vo(l2.getCatId().toString(), l3.getCatId().toString(), l3.getName());
                            return catelog3Vo;
                        }).collect(Collectors.toList());
                        catelog2Vo.setCatalog3List(collect);

                    }

                    return catelog2Vo;
                }).collect(Collectors.toList());
            }

            return catelog2Vos;
        }));

        return parent_cid;
    }

    // TODO 产生堆外内存溢出如何解决 OutOfDirectMemoryError
//    @Override
//    public Map<Long, List<Catelog2Vo>> getCatalogJson2() {
//        /**
//         * 空结果缓存，解决缓存穿透
//         * 设置过期时间，并且设置随机值，解决缓存雪崩
//         * 加锁，解决缓存击穿
//         */
//
//        //加入缓存
//        String catalogJson = redisTemplate.opsForValue().get(CategoryConstant.CATALOG_REDIS_KEY);
//        if (StringUtils.isEmpty(catalogJson)) {
//            //缓存中没有数据，查询数据库
//            log.info("缓存无命中~~~查询数据库中...");
//            Map<Long, List<Catelog2Vo>> catalogJsonFromDB = getCatalogJsonFromRedissonLock();
//
//            //返回数据库查询的数据
//            return catalogJsonFromDB;
//        }
//        log.info("缓存命中~~~直接返回...");
//        //【反序列化】
//        Map<Long, List<Catelog2Vo>> result = JSON.parseObject(catalogJson,
//                new TypeReference<Map<Long, List<Catelog2Vo>>>(){});
//
//        return result;
//    }

    /**
     * 从数据库中查询二级分类本地加锁
     * @return
     */
    public Map<Long, List<Catelog2Vo>> getCatalogJsonFromDbWithLocalLock() {

        //只要是同一把锁，就可以锁所有线程,SpringBoot所有的组件中都是单例的
        //TODO 本地锁只能锁住当前线程 -> 分布式锁
        synchronized (this) {
            //得到锁，需要在缓存中再判断一次，如果没有才需要继续查询
            return getDataFromDb();
        }

    }

    /**
     * 分布式锁从redis获取二级分类
     * @return
     */
    public Map<Long, List<Catelog2Vo>> getCatalogJsonFromRedisLock() {

        //1.占用分布式锁 => setIfAbsent = setnx
        String uuid = UUID.randomUUID().toString();
        Boolean lock = redisTemplate.opsForValue().setIfAbsent("lock", uuid,300,TimeUnit.SECONDS);
        if (lock) {
            log.info("获取分布式锁成功...");
            //2.加锁成功先设置过期时间，不然可能导致死锁问题 -> 加锁和设置过期时间必须是原子操作
            //redisTemplate.expire("lock",30,TimeUnit.SECONDS);
            //3.加锁成功，执行业务
            Map<Long, List<Catelog2Vo>> dataFromDb = null;
            try {
                dataFromDb = getDataFromDb();
            } catch (Exception e) {
                e.printStackTrace();
            }finally {
                //4.解锁：问题一：占用锁成功，解锁失败导致死锁 -> 设置锁过期时间 -> 删除公用锁或锁超时
                //获取值对比+对比成功删除必须为原子操作 == Lua脚本解锁
                String script = "if redis.call(\"get\",KEYS[1]) == ARGV[1]\n" +
                        "then\n" +
                        "    return redis.call(\"del\",KEYS[1])\n" +
                        "else\n" +
                        "    return 0\n" +
                        "end";
                //原子删锁
                Long flag = redisTemplate.execute(
                        new DefaultRedisScript<Long>(script, Long.class), Arrays.asList("lock"), uuid);
            }
//            String lockValue = redisTemplate.opsForValue().get("lock");
//            if (lockValue.equals(uuid)) {
//                //删除自己的锁
//                redisTemplate.delete("lock");
//            }

            return dataFromDb;
        }else {
            log.info("获取分布式锁失败,等待重试...");
            //加锁失败,重试获取锁 -> 自旋方式
            //休眠100ms重试
            try {
                Thread.sleep(100);
            } catch (InterruptedException e) {
                e.printStackTrace();
            }
            return getCatalogJsonFromRedisLock();
        }
    }

    /**
     * Redisson实现分布式锁获取二级分类
     * 问题：缓存更新如何保持查询一致性
     * @return
     */
    public Map<Long, List<Catelog2Vo>> getCatalogJsonFromRedissonLock() {


        //获取分布式锁
        RLock lock = redisson.getLock("catalogJson-lock");
        lock.lock();

        Map<Long, List<Catelog2Vo>> dataFromDb = null;
        try {
            dataFromDb = getDataFromDb();
        } catch (Exception e) {
            e.printStackTrace();
        }finally {
            lock.unlock();
        }

        return dataFromDb;
    }

    /**
     * 从数据库中获取二级分类
     * @return
     */
    private Map<Long, List<Catelog2Vo>> getDataFromDb() {
        String catalogJson = redisTemplate.opsForValue().get(CategoryConstant.CATALOG_REDIS_KEY);
        if (!StringUtils.isEmpty(catalogJson)) {
            //如果缓存不为空，则返回
            Map<Long, List<Catelog2Vo>> result = JSON.parseObject(catalogJson,
                    new TypeReference<Map<Long, List<Catelog2Vo>>>() {
                    });

            return result;
        }
        log.info("二级分类数据查询数据库~~~");
        /**
         * 将数据库操作合并为一次
         * 性能优化
         */
        List<CategoryEntity> selectList = baseMapper.selectList(null);

        //1.查出所有一级分类
        List<CategoryEntity> level1Categorys = getParent_cid(selectList, 0L);
        //2.封装数据
        Map<Long, List<Catelog2Vo>> parent_cid = level1Categorys.stream().collect(Collectors.toMap(k -> k.getCatId(), v -> {
            //根据一级分类查出所有二级分类
            List<CategoryEntity> categoryEntities = getParent_cid(selectList, v.getCatId());
            //封装结果
            List<Catelog2Vo> catelog2Vos = null;
            if (categoryEntities != null) {
                catelog2Vos = categoryEntities.stream().map(l2 -> {
                    Catelog2Vo catelog2Vo = new Catelog2Vo(v.getCatId().toString(), null, l2.getCatId().toString(), l2.getName());
                    //找出当前二级分类的VO找出三级分类
                    List<CategoryEntity> level3Catalog = getParent_cid(selectList, l2.getCatId());
                    if (level3Catalog != null) {
                        List<Catelog2Vo.Catelog3Vo> collect = level3Catalog.stream().map(l3 -> {
                            //封装成指定格式
                            Catelog2Vo.Catelog3Vo catelog3Vo = new Catelog2Vo.Catelog3Vo(l2.getCatId().toString(), l3.getCatId().toString(), l3.getName());
                            return catelog3Vo;
                        }).collect(Collectors.toList());
                        catelog2Vo.setCatalog3List(collect);

                    }

                    return catelog2Vo;
                }).collect(Collectors.toList());
            }

            return catelog2Vos;
        }));

        //TODO 锁时序问题，缓存中没有命中后查询数据库，先将结果放入缓存，再返回查询结果
        //将查询到的数据放入缓存,【序列化】
        String catalogRedisJson = JSON.toJSONString(parent_cid);
        //缓存中存放的必须是json  //设置过期时间，一天以后过期
        redisTemplate.opsForValue().set(
                CategoryConstant.CATALOG_REDIS_KEY, catalogRedisJson, 1, TimeUnit.DAYS);

        return parent_cid;
    }

    /**
     * 查出分类列表的子节点
     * @param selectList
     * @param parent_cid
     * @return
     */
    private List<CategoryEntity> getParent_cid(List<CategoryEntity> selectList, Long parent_cid) {
        List<CategoryEntity> collect = selectList.stream().filter(item -> item.getParentCid().equals(parent_cid)).collect(Collectors.toList());
        return collect;

//        return baseMapper.selectList(
//                new QueryWrapper<CategoryEntity>().eq("parent_cid", v.getCatId()));
    }

    private List<Long> findParentPath(Long catelogId,List<Long> paths){
        //收集当前节点id
        paths.add(catelogId);
        CategoryEntity byId = this.getById(catelogId);
        if (byId.getParentCid() != 0) {
            findParentPath(byId.getParentCid(), paths);
        }
        return paths;
    }

}